(frame-initialize): Create the initial frame invisible.

diff --git a/lisp/frame.el b/lisp/frame.el
index 6e5c335b250bf3f5966cacfe1f7b6cd5cd54ba59..85d9b734e8270ce65dcddd2aa01c237b8f230ec2 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -181,7 +181,8 @@ Pass it BUFFER as first arg, and (cdr ARGS) gives the rest of the args."
        (or (delq terminal-frame (minibuffer-frame-list))
            (progn
              (setq frame-initial-frame-alist
-                   (append initial-frame-alist default-frame-alist nil))
+                   (append initial-frame-alist default-frame-alist
+                           '((visibility . nil)) nil))
              (or (assq 'horizontal-scroll-bars frame-initial-frame-alist)
                  (setq frame-initial-frame-alist
                        (cons '(horizontal-scroll-bars . t)